
	****************************************************************************
	* Title: The Political Effects of Witnessing State Atrocities: 
	*        Evidence from the Nazi Death Marches
	****************************************************************************
	*
	* Authors: Alexander De Juan, Christian Gläßel, Felix Haass, Adam Scharpf
	*
	* Journal: Comparative Political Studies
	*
	* Date: March 2023
	*
	* Content: Replicating Table 2, Table SI.7.1, Table SI.7.2, Table SI.7.3
	*
    ****************************************************************************


	clear all
	
	*Storing working paths in macros (CAUTION: Change paths before running file)  
	global datapath="C:\Users\pxq521\Dropbox\Death Marches\replication_materials_death_marches\data\"		
	global logpath="C:\Users\pxq521\Dropbox\Death Marches\replication_materials_death_marches\tables\"
	
	
    ****************************************************************************
	* Writing log file
    ****************************************************************************
	
	*Start recording log file
	log using "$logpath\table_2_SI_71_SI_72_SI_73", replace 	
	
	
    ****************************************************************************
	* Loading dataset
    ****************************************************************************
	
	*Loading data
	use "$datapath\peasant_survey.dta", clear	
		
	
    ****************************************************************************
	* Storing control variables in macros data
    ****************************************************************************
	
	*Macro containing control variables and Regierungsbezirk Fixed Effects
	#delimit ;
	global controlsregbezfe
							age_group_40_54 
							age_group_55_64 
							age_group_65
							high_school 
							income 
							female
							farm_size 
							farm_location 
							erbhof_share_1939 
							location_income 
							location_size 							
							location_religion_20_79 
							location_religion_80 
							rb92 rb93 rb94 rb95 rb97
	;
	#delimit cr	
		
	*Macro only containing control variables
	#delimit ;
	global controlsonly	
							age_group_40_54 
							age_group_55_64 
							age_group_65
							high_school 
							income 
							female
							farm_size 
							farm_location 
							erbhof_share_1939 
							location_income 
							location_size 							
							location_religion_20_79 
							location_religion_80 
	;
	#delimit cr			
	
	
    ****************************************************************************
	* TABLE SI.7.1.
    ****************************************************************************
	
	*Summary statistics
	#delimit ;
	sum 

		hitler_preference
		altruism_africa		
		EWG_abolish
		altruism_mistrust
		
		holiday
		adviser
		vocation
		fixworkhours
		selfemployed

		sum_bodies_am_1_50 		
		sum_bodies_am_50		
		
		$controlsonly
		if transit_victim_cat != 1
		;
	#delimit cr	

	
    ****************************************************************************
	* TABLE 2
    ****************************************************************************
	
 	*********************************
	*Wellbeing under Hitler
 	*********************************
	
	*Model 1
	#delimit ;
	reg hitler_preference 	sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsregbezfe
							if transit_victim_cat != 1							
							, cl(rb_code)
	;
	#delimit cr	
	
	
	*Model 2
	#delimit ;
	reg hitler_preference 	sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsonly
							if transit_victim_cat != 1							
							, cl(kreis_code)
	;
	#delimit cr	
	
	
 	*********************************
	*Mistrust
 	*********************************	
	
	*Model 3
	#delimit ;
	reg altruism_mistrust 	sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsregbezfe
							if transit_victim_cat != 1							
							, cl(rb_code)
	;
	#delimit cr	
	
	*Model 4
	#delimit ;
	reg altruism_mistrust 	sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsonly
							if transit_victim_cat != 1							
							, cl(kreis_code)
	;
	#delimit cr	
	
	
    ****************************************************************************
	* TABLE SI.7.2.
    ****************************************************************************	
	
 	*********************************
	*Foreign aid
 	*********************************
	
	*Model 1
	#delimit ;
	reg altruism_africa 	sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsregbezfe
							if transit_victim_cat != 1							
							, cl(rb_code)
	;
	#delimit cr	
	
	*Model 2
	#delimit ;
	reg altruism_africa 	sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsonly
							if transit_victim_cat != 1							
							, cl(kreis_code)
	;
	#delimit cr		
	
	
 	*********************************
	*Abolish EEC
 	*********************************	
	
	*Model 3
	#delimit ;
	reg EWG_abolish 		sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsregbezfe
							if transit_victim_cat != 1						
							, cl(rb_code)
	;
	#delimit cr	
	
	*Model 4	
	#delimit ;
	reg EWG_abolish 		sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsonly
							if transit_victim_cat != 1							
							, cl(kreis_code)
	;
	#delimit cr	
	
	
    ****************************************************************************
	* TABLE SI.7.3.
    ****************************************************************************		
	
 	*********************************
	*Holidays needed
 	*********************************
	
	*Model 1
	#delimit ;
	reg holiday 			sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsregbezfe
							if transit_victim_cat != 1							
							, cl(rb_code)
	;
	#delimit cr	
	
	*Model 2
	#delimit ;
	reg holiday 			sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsonly
							if transit_victim_cat != 1							
							, cl(kreis_code)
	;
	#delimit cr	
	
	
 	*********************************
	*Consultant necessary
 	*********************************	
	
	*Model 3
	#delimit ;
	reg adviser 			sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsregbezfe
							if transit_victim_cat != 1							
							, cl(rb_code)
	;
	#delimit cr		
	
	*Model 4	
	#delimit ;
	reg adviser 			sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsonly
							if transit_victim_cat != 1							
							, cl(kreis_code)
	;
	#delimit cr	
	
	
 	*********************************
	*Agriculture as vocation
 	*********************************	
	
	*Model 5
	#delimit ;
	reg vocation 			sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsregbezfe
							if transit_victim_cat != 1							
							, cl(rb_code)
	;
	#delimit cr		
	
	*Model 6	
	#delimit ;
	reg vocation 			sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsonly
							if transit_victim_cat != 1							
							, cl(kreis_code)
	;
	#delimit cr	
	
	
 	*********************************
	*Working hours fixed
 	*********************************	
	
	*Model 7
	#delimit ;
	reg fixworkhours 		sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsregbezfe
							if transit_victim_cat != 1							
							, cl(rb_code)
	;
	#delimit cr	
	
	*Model 8	
	#delimit ;
	reg fixworkhours 		sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsonly
							if transit_victim_cat != 1							
							, cl(kreis_code)
	;
	#delimit cr		
	
	
 	*********************************
	*Self-employment beneficial
 	*********************************	
	
	*Model 9
	#delimit ;
	reg selfemployed 		sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsregbezfe
							if transit_victim_cat != 1							
							, cl(rb_code)
	;
	#delimit cr		
	
	*Model 10
	#delimit ;
	reg selfemployed 		sum_bodies_am_1_50 
							sum_bodies_am_50
							$controlsonly
							if transit_victim_cat != 1							
							, cl(kreis_code)
	;
	#delimit cr	
	
	
	****************************************************************************	
	*	
	****************************************************************************		

	*Clearing data
	clear all
	
	*End recording log file
	log close			
	